Electronics Boutique Catalog 1996 Spring/1996 Electronics Boutique Spring CD-ROM (USA).bin/eb/hi.dir/00014_StoreLocation.ls

Text File | 1996-03-18 | 582 b | 25 lines

on mouseUp
  global mystore
  if the visible of sprite 32 = 1 then
    updateStage()
    set the castNum of sprite 29 to 173
    set mystore to the text of cast "storeLocation"
    puppetSound("blip")
  end if
end

on mouseDown
  if the visible of sprite 32 = 1 then
    set x to the locH of sprite 32
    set y to the locV of sprite 32
    set Xnew to x + 1
    set Ynew to y + 1
    set the locH of sprite 32 to Xnew
    set the locV of sprite 32 to Ynew
    set the castNum of sprite 29 to 176
    set the ink of sprite 31 to 39
    nextLocation()
    updateStage()
  end if
end